program Kasatelnay;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
r, x1, y1, x0, y0, a, b, c, a1, b1, c1: real;

begin
  write('r=');
  readln(r);
  write('x1=');
  readln(x1);
  write('y1=');
  readln(y1);
  write('x0=');
  readln(x0);
  write('y0=');
  readln(y0);
  if ((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)<=r) then
    writeln ('There are no tangents.')
  else
  begin
    b:=((r*(y1-y0)+(x1-x0)*sqrt((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)-r*r))/((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)));
    b1:=((r*(y1-y0)-(x1-x0)*sqrt((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)-r*r))/((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)));
    a:=((r*(x1-x0)-(y1-y0)*sqrt((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)-r*r))/((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)));
    a1:=((r*(x1-x0)+(y1-y0)*sqrt((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)-r*r))/((x1-x0)*(x1-x0)+(y1-y0)*(y1-y0)));
    c:=-a*x0-b*y0;
    c1:=-a1*x0-b*y0;
    writeln(a:0:3, 'x+', b:0:3, 'y+', c:0:3, '=0');
    writeln(a1:0:3, 'x+', b1:0:3, 'y+', c1:0:3, '=0');
  end;
  readln;
end.
